home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Texteditors / Write / Module / EDIT.MENU < prev    next >
Encoding:
Text File  |  1996-09-27  |  2.1 KB  |  131 lines
  1. /*
  2.  *   $VER: EDIT.MENU 4.0039 (22-Mai-95)
  3.  */
  4.  
  5. VERSIONCHECK 40000 "EDIT.MENU"
  6.  
  7. KEY "control <"
  8.   GETNUMBER "Bewege Block x Spalten\nnach links:" 1 
  9.   BLOCKLEFT _RN;
  10.  
  11. KEY "control >"
  12.   GETNUMBER "Bewege Block x Spalten\nnach rechts:" 1 
  13.   BLOCKRIGHT _RN;
  14.  
  15. KEY "control x"
  16.   GETNUMBER "Block ausschneiden in Buffer:" 1 
  17.   COPYBLOCK _RN 
  18.   DELETEBLOCK ;
  19.  
  20. KEY "control c"
  21.   GETNUMBER "Kopiere Block in Buffer:" 1 
  22.   COPYBLOCK _RN 
  23.   SETTITLE "Block kopiert." 0;
  24.  
  25. KEY "control v"
  26.   GETNUMBER "Einfügen aus Buffer:" 1 
  27.   INSERTBLOCK _RN ;
  28.  
  29.  
  30. MENU "Edieren"
  31.  
  32. ITEM "Rückgängig machen" "ß"
  33.   UNDO 1;
  34.  
  35. ITEM "Rückgängig machen ..." ""
  36.   GETNUMBER "Wieviel Schritte\nrückgängig machen?" 1 
  37.   UNDO _RN;
  38.  
  39. ITEMBAR
  40.  
  41. ITEM "Setze Marke" "M"
  42.   SETTITLE "Marke gesetzt." 0
  43.   SETMARK;
  44.  
  45. ITEM "Lösche Marke" "U"
  46.   UNMARK;
  47.  
  48. ITEMBAR
  49.  
  50. ITEM "Ausschneiden" "X"
  51.   COPYBLOCK 0 
  52.   DELETEBLOCK ;
  53.  
  54. ITEM "Kopieren" "C"
  55.   COPYBLOCK 0 
  56.   SETTITLE "Block kopiert." 0;
  57.  
  58. ITEM "Einfügen" "V"
  59.   INSERTBLOCK 0 ;
  60.  
  61. ITEM "Löschen" ""
  62.   DELETEBLOCK ;
  63.  
  64. ITEMBAR
  65.  
  66. ITEM "Clipboard" ""
  67.   NOP;
  68.  
  69. SUB "Ausschneiden nach Clip" "alt x"
  70.   COPYBLOCK 0 
  71.   BUFFERTOCLIP 0 0 
  72.   DELETEBLOCK ;
  73.  
  74. SUB "Nach Clip kopieren" "alt c"
  75.   COPYBLOCK 0 
  76.   BUFFERTOCLIP 0 0 
  77.   SETTITLE "Block kopiert." 0;
  78.  
  79. SUB "Einfügen aus Clip" "alt v"
  80.   CLIPTOBUFFER 0 0
  81.   INSERTBLOCK 0 ;
  82.  
  83. SUB "Buffer nach Clip" ""
  84.   BUFFERTOCLIP 0 0 ;
  85.  
  86. SUB "Clip nachBuffer" ""
  87.   CLIPTOBUFFER 0 0;
  88.  
  89. ITEMBAR
  90.  
  91. ITEM "Lösche Buffer" ""
  92.   CLEARBUFFER 0
  93.   SETTITLE "OK." 0;
  94.  
  95. ITEM "Speicher Block als ..." ""
  96.   COPYBLOCK 0 
  97.   GETFILE "" "" {@SAVE}
  98.   SAVEBUFFER _PATH 0 ;
  99.  
  100. ITEM "Drucke Block" ""
  101.   COPYBLOCK 0 
  102.   SAVEBUFFER "PRT:" 0 ;
  103.  
  104. ITEM "Füge Datei ein ..." ""
  105.   GETFILE "" "" 
  106.   LOADBUFFER _PATH 0 
  107.   INSERTBLOCK 0 ;
  108.  
  109. ITEMBAR
  110.  
  111. ITEM "Block links" "<"
  112.   BLOCKLEFT 1;
  113.  
  114. ITEM "Block rechts" ">"
  115.   BLOCKRIGHT 1;
  116.  
  117. ITEM "Block linksbündig ..." ""
  118.   GETNUMBER "Mache Block bündig zu Zeile:" _XPOS 
  119.   BLOCKLFTALIG _RN;
  120.  
  121. ITEM "Block rechtsbündig ..." ""
  122.   GETNUMBER "Mach Block bündig zu Zeile:" _XPOS 
  123.   BLOCKRGHTALIG _RN;
  124.  
  125. ITEM "Block Bündig" "="
  126.   BLOCKBLOCK @MARKA @MARKB "" 3;
  127.  
  128. ITEM "Zentriere Block ..." ""
  129.   BLOCKCENTER 1 79;
  130.  
  131.